home *** CD-ROM | disk | FTP | other *** search
Text File | 1999-04-29 | 112.8 KB | 4,252 lines |
- object EffectForm: TEffectForm
- Left = 182
- Top = 158
- Width = 609
- Height = 326
- BorderStyle = bsSizeToolWin
- Caption = 'Filters and Effects'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Menu = MainMenu1
- OldCreateOrder = True
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnResize = FormResize
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 601
- Height = 280
- Align = alClient
- TabOrder = 0
- object Panel2: TPanel
- Left = 1
- Top = 1
- Width = 599
- Height = 27
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 0
- object HSRubberband: TSpeedButton
- Left = 2
- Top = 1
- Width = 103
- Height = 25
- Hint = 'Hide/Show Rubberband'
- AllowAllUp = True
- GroupIndex = 1
- Caption = 'Hide Selection'
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777077777777
- 0777777077777777077777707777777707770000000000000000777077777777
- 0777777077777777077777707777777707777770777777770777777077777777
- 0777777077777777077777707777777707770000000000000000777077777777
- 0777777077777777077777707777777707777770777777770777}
- ParentShowHint = False
- ShowHint = True
- OnClick = HSRubberbandClick
- end
- object ResetRubberbandBtn: TSpeedButton
- Left = 104
- Top = 1
- Width = 106
- Height = 25
- Hint = 'Reset RubberBand to full image'
- Caption = 'Reset Selection'
- Glyph.Data = {
- 76020000424D7602000000000000760000002800000040000000100000000100
- 0400000000000002000000000000000000001000000000000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00331111133333
- 333333FFFFF33333333333222223332222233333333333444443333199933333
- 333333388883333333333332AAA333AAA2333333333333CCC433333199933333
- 1133333888833333FF333332AAA333AAA2333334433333CCC433339919933333
- 99133388F883333388F333AA2AA333AA2A2333CC433333CC4C43339133933333
- 3913338F33833333388F33A233A333A33A2333C4333333C33CC4391333333333
- 339138F333333333338F3A233333333333A23C433333333333C4391333333333
- 339138F333333333338F3A233333333333A23C433333333333C4391333333333
- 339138F333333333338F3A233333333333A23C433333333333C4391333333333
- 339138F333333333338F3A233333333333A23C433333333333C4391333333333
- 339138F333333333338F3A233333333333A23C433333333333C4339133333333
- 3991338F33333333388F33A2333333333AA233C4333333333CC4339913333333
- 99133388F333333388F333AA23333333AA2333CC43333333CC43333991333339
- 913333388F3333388F33333AA233333AA233333CC433333CC433333399111119
- 1333333388FFFFF8F3333333AA22222A23333333CC44444C4333333333999993
- 33333333338888833333333333AAAAA33333333333CCCCC33333333333333333
- 3333333333333333333333333333333333333333333333333333}
- NumGlyphs = 4
- ParentShowHint = False
- ShowHint = True
- OnClick = ResetRubberbandBtnClick
- end
- object ReloadimageBtn: TSpeedButton
- Left = 209
- Top = 1
- Width = 66
- Height = 25
- Hint = 'Reload image'
- Caption = 'Reload'
- Enabled = False
- Glyph.Data = {
- 06010000424D06010000000000007600000028000000140000000C0000000100
- 0400000000009000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00CCCCCCCCCCCC
- CCCCCCCC0000CCCCCC70000007CCCCCC0000CCCCC7788887707CCCCC0000CCCC
- C0F88777770CCCCC0000CCCCC7700000077CCCCC0000CCCCC7788887707CCCCC
- 0000CCCCC0F88777770CCCCC0000CCCCC7700000077CCCCC0000CCCCC7788888
- 807CCCCC0000CCCCC0F88888880CCCCC0000CCCCC78FFFFF877CCCCC0000CCCC
- CC77000077CCCCCC0000}
- ParentShowHint = False
- ShowHint = True
- OnClick = ReloadimageBtnClick
- end
- object PreviewBtn: TSpeedButton
- Left = 274
- Top = 1
- Width = 68
- Height = 25
- Hint = 'Preview this effect before applying it'
- Caption = 'Preview'
- Glyph.Data = {
- 4E010000424D4E01000000000000760000002800000012000000120000000100
- 040000000000D800000000000000000000001000000000000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDD88880
- DDDDDD000000DDDDDD8000008DDDDD000000DDDDDD00FF770DDDDD000000DDDD
- DD8000000DDDDD000000DDDDDD00FF770DDDDD000000DDDDDD8000000DDDDD00
- 0000DDDDDD0F878F0DDDDD000000DDDDDD8B878BF0DDDD000000DDDDD0FF878F
- F8DDDD000000DDDD8BFB878BFB8DDD000000DDD8BFF87778FFB8DD000000DDD8
- FBF87778FBF8DD000000DDD8BF0800080FB8DD000000DDD8FBF8FBF8FBF8DD00
- 0000DDDD8FFFFFFFFF8DDD000000DDDDD8FBFBFBF8DDDD000000DDDDDD88BFB8
- 8DDDDD000000DDDDDDDD888DDDDDDD000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = DoEffect
- end
- object ApplyBtn: TSpeedButton
- Left = 341
- Top = 1
- Width = 59
- Height = 25
- Hint = 'Apply this effect to the master image'
- Caption = 'Apply'
- Glyph.Data = {
- 4E010000424D4E01000000000000760000002800000012000000120000000100
- 040000000000D800000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDD0
- 0000000000000D000000DDD08888888888880D000000DDD0F770007777780D00
- 0000DDD0F777077777780D000000DDD08B78087777780D000000DBD08B007000
- 00780D000000D8B88B78B77777780D000000DD8B8B8BFFFFFFF80D000000DBB8
- BBB0000000000D000000DD88BBBDDDDDDDDDDD000000DD8B8B8BDDDDDDDDDD00
- 0000D8BD8BDDDDDDDDDDDD000000DBDD8BDD8BDDDDDDDD000000DDDD8BDDDDDD
- DDDDDD000000DDDDDDDDDDDDDDDDDD000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = DoEffect
- end
- object StopProcessBtn: TSpeedButton
- Left = 399
- Top = 1
- Width = 59
- Height = 25
- Hint = 'Stop Processing the image'
- Caption = 'Stop'
- Enabled = False
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777700007777711111111177777700007777199999999917777700007771
- 9999999999917777000077199999999999991777000071999999999999999177
- 000019999999999999999917000019FFF99F99FFF9F9991700001999F99F99F9
- F9F99917000019FFF99F99F9F9FFF917000019F9999F99F9F9F9F917000019FF
- F9FFF9FFF9FFF917000019999999999999999917000019999999999999999917
- 0000719999999999999991770000771999999999999917770000777199999999
- 9991777700007777199999999917777700007777711111111177777700007777
- 77777777777777770000}
- ParentShowHint = False
- ShowHint = True
- OnClick = StopProcessBtnClick
- end
- object exBtn: TSpeedButton
- Left = 457
- Top = 1
- Width = 111
- Height = 25
- Hint = 'Close and apply all to main image'
- AllowAllUp = True
- GroupIndex = 10
- Caption = 'Close and Save'
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000028000000140000000100
- 0400000000009001000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 33333333388888888883333333333FFFFFFFFFF3333333330000000000833333
- 33338888888888F3333333330FFFFFFFF083333333338F33333F38F333333333
- 0FFFF00FF083333333338F33388FF8F3333333330FFF0000F083333333338F33
- 8888F8F3333333330FF80000F083333333338F338888F8F3333333330F800000
- 0083333333338F38888888F3333333330F000F000083333333338F88838888F3
- 333333330F00FFF00083333333338F88333888F3333333330FFFFF0000833333
- 33338F33338888FF333333330FFFFF0F0003333333338F33338F888F33333333
- 0FFFFF003008333333338FFFFF88388F33333333000000033800333333338888
- 88833388F333333333333333330083333333333333333388FF33333333333333
- 3330033333333333333333388F33333333333333333303333333333333333333
- 8333333333333333333333333333333333333333333333333333333333333333
- 33333333333333333333}
- NumGlyphs = 2
- OnClick = exBtnClick
- end
- object CloseNadNotSaveBtn: TSpeedButton
- Left = 567
- Top = 1
- Width = 31
- Height = 25
- Hint = 'Close and do not save'
- AllowAllUp = True
- GroupIndex = 10
- Glyph.Data = {
- 42010000424D4201000000000000760000002800000011000000110000000100
- 040000000000CC00000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 777770000000777777777777777770000000777777777777770F700000007777
- 0F777777777770000000777000F7777770F770000000777000F777770F777000
- 00007777000F77700F777000000077777000F700F7777000000077777700000F
- 7777700000007777777000F777777000000077777700000F7777700000007777
- 7000F70F7777700000007770000F77700F7770000000770000F7777700F77000
- 00007700F7777777700F70000000777777777777777770000000777777777777
- 777770000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = CloseNadNotSaveBtnClick
- end
- end
- object ilStatus: TStatusBar
- Left = 1
- Top = 260
- Width = 599
- Height = 19
- Panels = <
- item
- Text = 'Status:'
- Width = 45
- end
- item
- Width = 300
- end
- item
- Text = 'Progress'
- Width = 50
- end>
- SimplePanel = False
- end
- object IlPages: TPageControl
- Left = 253
- Top = 28
- Width = 347
- Height = 232
- ActivePage = TabSheet1
- Align = alRight
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnChange = IlPagesChange
- object TabSheet1: TTabSheet
- Caption = 'AutoContrast'
- object Label2: TLabel
- Left = 0
- Top = 176
- Width = 195
- Height = 13
- Caption = 'Select an area and click apply or preview'
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Bleed'
- object Label34: TLabel
- Left = 34
- Top = 75
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object BleedBar: TTrackBar
- Left = 80
- Top = 74
- Width = 150
- Height = 22
- Max = 255
- Min = -255
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = BleedBarChange
- end
- object BleedEdit: TEdit
- Left = 232
- Top = 72
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = BleedEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet3: TTabSheet
- Caption = 'Borders'
- object Label44: TLabel
- Left = 33
- Top = 12
- Width = 25
- Height = 13
- Caption = 'Edge'
- end
- object Label43: TLabel
- Left = 26
- Top = 124
- Width = 31
- Height = 13
- Caption = 'Shape'
- end
- object labAngle: TLabel
- Left = 31
- Top = 92
- Width = 27
- Height = 13
- Caption = 'Angle'
- Visible = False
- end
- object labVectors: TLabel
- Left = 22
- Top = 40
- Width = 36
- Height = 13
- Caption = 'Vectors'
- Visible = False
- end
- object lavVecSize: TLabel
- Left = 16
- Top = 67
- Width = 42
- Height = 13
- Caption = 'Vec Size'
- Visible = False
- end
- object brWindowColor: TCheckBox
- Left = 33
- Top = 159
- Width = 172
- Height = 17
- Caption = 'Use the color of this window or '
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 9
- OnClick = brWindowColorClick
- end
- object brShapeCombo: TComboBox
- Left = 78
- Top = 121
- Width = 103
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'None'
- 'Rectangle'
- 'Square'
- 'RoundRect'
- 'RoundSquare'
- 'Ellipse'
- 'Circle'
- 'TriangleLeft'
- 'TriangleRight'
- 'TriangleUp'
- 'TriangleDown'
- 'Diamond'
- 'Star'
- 'PolyGon')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 8
- OnChange = brShapeComboChange
- end
- object brEdgeBar: TTrackBar
- Left = 75
- Top = 11
- Width = 150
- Height = 22
- Max = 100
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = brEdgeBarChange
- end
- object brAngleBar: TTrackBar
- Left = 75
- Top = 90
- Width = 150
- Height = 22
- Max = 360
- Orientation = trHorizontal
- Frequency = 1
- Position = 90
- SelEnd = 0
- SelStart = 0
- TabOrder = 6
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- Visible = False
- OnChange = brAngleBarChange
- end
- object brVectorsBar: TTrackBar
- Left = 75
- Top = 38
- Width = 150
- Height = 22
- Max = 100
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- Visible = False
- OnChange = brVectorsBarChange
- end
- object brVectorSizeBar: TTrackBar
- Left = 75
- Top = 65
- Width = 150
- Height = 22
- Max = 100
- Orientation = trHorizontal
- Frequency = 1
- Position = 50
- SelEnd = 0
- SelStart = 0
- TabOrder = 4
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- Visible = False
- OnChange = brVectorSizeBarChange
- end
- object brVectorSizeEdit: TEdit
- Left = 235
- Top = 62
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 5
- Text = '50'
- Visible = False
- OnChange = brVectorSizeEditChange
- OnKeyPress = EditKeyPress
- end
- object brVectorsEdit: TEdit
- Left = 235
- Top = 35
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '10'
- Visible = False
- OnChange = brVectorsEditChange
- OnKeyPress = EditKeyPress
- end
- object brAngleEdit: TEdit
- Left = 235
- Top = 88
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 7
- Text = '90'
- Visible = False
- OnChange = brAngleEditChange
- OnKeyPress = EditKeyPress
- end
- object brEdgeEdit: TEdit
- Left = 235
- Top = 9
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = brEdgeEditChange
- OnKeyPress = EditKeyPress
- end
- object brMaskColorBtn: TBitBtn
- Left = 203
- Top = 151
- Width = 111
- Height = 30
- Caption = 'use mask color'
- Enabled = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 11
- OnClick = brMaskColorBtnClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
- DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
- 0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
- 000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
- end
- object Panel10: TPanel
- Left = 313
- Top = 151
- Width = 18
- Height = 30
- TabOrder = 10
- end
- end
- object TabSheet4: TTabSheet
- Caption = 'Border Fade'
- object Label3: TLabel
- Left = 49
- Top = 68
- Width = 25
- Height = 13
- Caption = 'Edge'
- end
- object bfEdgeBar: TTrackBar
- Left = 91
- Top = 67
- Width = 150
- Height = 22
- Max = 1000
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = bfEdgeBarChange
- end
- object bfEdgeEdit: TEdit
- Left = 251
- Top = 65
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = bfEdgeEditChange
- OnKeyPress = EditKeyPress
- end
- object bfWindoColor: TCheckBox
- Left = 28
- Top = 159
- Width = 172
- Height = 17
- Caption = 'Use the color of this window or '
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 2
- OnClick = bfWindoColorClick
- end
- object bfEdgeWColBtn: TBitBtn
- Left = 199
- Top = 151
- Width = 115
- Height = 30
- Caption = 'use custom color'
- Enabled = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = BackColorClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
- DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
- 0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
- 000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
- end
- object Panel9: TPanel
- Left = 313
- Top = 151
- Width = 18
- Height = 30
- TabOrder = 4
- end
- end
- object TabSheet5: TTabSheet
- Caption = 'Blur'
- object Label32: TLabel
- Left = 34
- Top = 66
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object BlurBar: TTrackBar
- Left = 72
- Top = 66
- Width = 150
- Height = 22
- Max = 100
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = BlurBarChange
- end
- object BlurEdit: TEdit
- Left = 224
- Top = 64
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '1'
- OnChange = BlurEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet6: TTabSheet
- Caption = 'Bright'
- object Label30: TLabel
- Left = 34
- Top = 67
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object BrightBar: TTrackBar
- Left = 80
- Top = 66
- Width = 150
- Height = 22
- Max = 255
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = BrightBarChange
- end
- object BrightEdit: TEdit
- Left = 232
- Top = 64
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = BrightEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet7: TTabSheet
- Caption = 'Color'
- object Label54: TLabel
- Left = 68
- Top = 154
- Width = 169
- Height = 13
- Caption = 'Current displayed image has colors'
- end
- object Panel14: TPanel
- Left = 5
- Top = 6
- Width = 329
- Height = 87
- TabOrder = 0
- object Label5: TLabel
- Left = 6
- Top = 20
- Width = 80
- Height = 13
- Caption = 'Number of colors'
- end
- object Label53: TLabel
- Left = 16
- Top = 48
- Width = 70
- Height = 26
- Alignment = taRightJustify
- Caption = 'Color dithering method'
- WordWrap = True
- end
- object crColorsBar: TTrackBar
- Left = 104
- Top = 18
- Width = 150
- Height = 22
- Max = 255
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 255
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = crColorsBarChange
- end
- object crColorsEdit: TEdit
- Left = 256
- Top = 16
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '255'
- OnChange = crColorsEditChange
- OnKeyPress = EditKeyPress
- end
- object R1: TRadioButton
- Left = 101
- Top = 46
- Width = 76
- Height = 17
- Hint = 'Dither Method'
- Caption = 'Bayer'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- TabStop = True
- end
- object R2: TRadioButton
- Left = 178
- Top = 44
- Width = 76
- Height = 17
- Hint = 'Dither Method'
- Caption = 'Burkes'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- object R3: TRadioButton
- Left = 101
- Top = 62
- Width = 76
- Height = 17
- Hint = 'Dither Method'
- Caption = 'Floyed'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- end
- object R4: TRadioButton
- Left = 178
- Top = 60
- Width = 94
- Height = 17
- Hint = 'Dither Method'
- Caption = 'GrayScale'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- end
- end
- object Panel15: TPanel
- Left = 5
- Top = 93
- Width = 329
- Height = 44
- TabOrder = 1
- object MillionColors: TCheckBox
- Left = 116
- Top = 13
- Width = 109
- Height = 17
- Caption = '16 Million Colors'
- TabOrder = 0
- OnClick = MillionColorsClick
- end
- end
- end
- object TabSheet29: TTabSheet
- Caption = 'Color Palette'
- object GroupBox3: TGroupBox
- Left = 20
- Top = 0
- Width = 296
- Height = 203
- Caption = 'Palette Info'
- TabOrder = 0
- object lblRed: TLabel
- Left = 8
- Top = 15
- Width = 6
- Height = 13
- Caption = '0'
- ParentShowHint = False
- ShowHint = True
- end
- object lblGreen: TLabel
- Left = 8
- Top = 49
- Width = 6
- Height = 13
- Caption = '0'
- ParentShowHint = False
- ShowHint = True
- end
- object lblBlue: TLabel
- Left = 8
- Top = 82
- Width = 6
- Height = 13
- Caption = '0'
- ParentShowHint = False
- ShowHint = True
- end
- object lblPalText: TLabel
- Left = 8
- Top = 135
- Width = 3
- Height = 13
- ParentShowHint = False
- ShowHint = True
- end
- object PalOpt: TSpeedButton
- Left = 249
- Top = 167
- Width = 42
- Height = 21
- Caption = 'Apply'
- OnClick = PalOptClick
- end
- object Panel17: TPanel
- Left = 126
- Top = 7
- Width = 167
- Height = 149
- Caption = 'Panel17'
- Color = clBlack
- Enabled = False
- TabOrder = 4
- OnMouseDown = Panel17MouseDown
- object pbPalette: TPaintBox
- Left = 1
- Top = 1
- Width = 165
- Height = 147
- Hint = 'Click me to select'
- Align = alClient
- Color = clBlack
- Enabled = False
- ParentColor = False
- ParentShowHint = False
- ShowHint = True
- OnMouseDown = pbPaletteMouseDown
- OnPaint = pbPalettePaint
- end
- object Label64: TLabel
- Left = 8
- Top = 30
- Width = 155
- Height = 116
- Alignment = taCenter
- AutoSize = False
- Caption =
- 'This image doesn'#39't have a color palette. Decrease the number of' +
- ' colors to 256 or less by clicking on the color tab.'
- Color = clWhite
- Enabled = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- Transparent = True
- Visible = False
- WordWrap = True
- end
- end
- object pnlColor: TPanel
- Left = 48
- Top = 113
- Width = 20
- Height = 17
- Hint = 'Click Me to apply to palette'
- Enabled = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = pnlColorClick
- end
- object trbRed: TTrackBar
- Left = 2
- Top = 26
- Width = 107
- Height = 19
- Hint = 'Set the red component of the color'
- Enabled = False
- Max = 255
- Orientation = trHorizontal
- ParentShowHint = False
- PageSize = 5
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- ShowHint = True
- TabOrder = 1
- TabStop = False
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsNone
- OnChange = TrackBarChange
- end
- object trbGreen: TTrackBar
- Left = 2
- Top = 60
- Width = 107
- Height = 19
- Hint = 'Set the green component of the color'
- Enabled = False
- Max = 255
- Orientation = trHorizontal
- ParentShowHint = False
- PageSize = 5
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- ShowHint = True
- TabOrder = 2
- TabStop = False
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsNone
- OnChange = TrackBarChange
- end
- object trbBlue: TTrackBar
- Left = 2
- Top = 94
- Width = 107
- Height = 19
- Hint = 'Set the blue component of the color'
- Enabled = False
- Max = 255
- Orientation = trHorizontal
- ParentShowHint = False
- PageSize = 5
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- ShowHint = True
- TabOrder = 3
- TabStop = False
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsNone
- OnChange = TrackBarChange
- end
- object PalCombo: TComboBox
- Left = 7
- Top = 167
- Width = 241
- Height = 21
- ItemHeight = 13
- Items.Strings = (
- 'Create GrayScale Palette and Optimize Image'
- 'Load Palette from File and Optimize Image'
- 'Load Palette from File and Apply'
- 'Save Palette to File')
- TabOrder = 5
- Text = 'Create GrayScale Palette and Optimize Image'
- end
- end
- end
- object TabSheet18: TTabSheet
- Caption = 'Dark'
- object Label51: TLabel
- Left = 34
- Top = 67
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object DarkBar: TTrackBar
- Left = 80
- Top = 66
- Width = 150
- Height = 22
- Max = 255
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = DarkBarChange
- end
- object DarkEdit: TEdit
- Left = 232
- Top = 64
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = DarkEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet28: TTabSheet
- Caption = 'Despeckle'
- object Label27: TLabel
- Left = 34
- Top = 67
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object dsValueBar: TTrackBar
- Left = 80
- Top = 66
- Width = 150
- Height = 22
- Max = 100
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = dsValueBarChange
- end
- object dsValueEdit: TEdit
- Left = 232
- Top = 64
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = dsValueEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet9: TTabSheet
- Caption = 'Edge Detection'
- object Label26: TLabel
- Left = 34
- Top = 67
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object EdgeBar: TTrackBar
- Left = 76
- Top = 66
- Width = 150
- Height = 22
- Max = 100
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = EdgeBarChange
- end
- object EdgeEdit: TEdit
- Left = 228
- Top = 64
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '1'
- OnChange = EdgeEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet10: TTabSheet
- Caption = 'Engrave'
- object Label19: TLabel
- Left = 34
- Top = 67
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object EnGraveBar: TTrackBar
- Left = 80
- Top = 66
- Width = 150
- Height = 22
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = EnGraveBarChange
- end
- object EnhanceEdit: TEdit
- Left = 232
- Top = 64
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '1'
- OnChange = EnhanceEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet11: TTabSheet
- Caption = 'Enhance'
- object Label18: TLabel
- Left = 14
- Top = 22
- Width = 59
- Height = 13
- Caption = 'Gamma Red'
- end
- object Label20: TLabel
- Left = 5
- Top = 53
- Width = 68
- Height = 13
- Caption = 'Gamma Green'
- end
- object Label21: TLabel
- Left = 13
- Top = 84
- Width = 60
- Height = 13
- Caption = 'Gamma Blue'
- end
- object Label22: TLabel
- Left = 46
- Top = 146
- Width = 27
- Height = 13
- Caption = 'Brigth'
- end
- object Label23: TLabel
- Left = 34
- Top = 115
- Width = 39
- Height = 13
- Hint = 'gauss or uniform'
- Caption = 'Contrast'
- end
- object enGammaRedBar: TTrackBar
- Left = 88
- Top = 20
- Width = 150
- Height = 22
- Max = 255
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = enGammaRedBarChange
- end
- object enGammaRedEdit: TEdit
- Left = 248
- Top = 19
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '10'
- OnChange = enGammaRedEditChange
- OnKeyPress = EditKeyPress
- end
- object enGammaGreenBar: TTrackBar
- Left = 88
- Top = 50
- Width = 150
- Height = 22
- Max = 255
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = enGammaGreenBarChange
- end
- object enGammaGreenEdit: TEdit
- Left = 248
- Top = 49
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '10'
- OnChange = enGammaGreenEditChange
- OnKeyPress = EditKeyPress
- end
- object enGammaBlueBar: TTrackBar
- Left = 88
- Top = 81
- Width = 150
- Height = 22
- Max = 255
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 4
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = enGammaBlueBarChange
- end
- object enGammaBlueEdit: TEdit
- Left = 248
- Top = 80
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 5
- Text = '10'
- OnChange = enGammaBlueEditChange
- OnKeyPress = EditKeyPress
- end
- object enContrastBar: TTrackBar
- Left = 88
- Top = 112
- Width = 150
- Height = 22
- Max = 255
- Min = -255
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 6
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = enContrastBarChange
- end
- object enContrastEdit: TEdit
- Left = 248
- Top = 111
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 7
- Text = '0'
- OnChange = enContrastEditChange
- OnKeyPress = EditKeyPress
- end
- object enBrightEdit: TEdit
- Left = 248
- Top = 141
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 9
- Text = '0'
- OnChange = enBrightEditChange
- OnKeyPress = EditKeyPress
- end
- object enBrightBar: TTrackBar
- Left = 88
- Top = 142
- Width = 150
- Height = 22
- Max = 255
- Min = -255
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 8
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = enBrightBarChange
- end
- end
- object Extrude: TTabSheet
- Caption = 'Extrude'
- object Label17: TLabel
- Left = 34
- Top = 67
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object Levels: TCheckBox
- Left = 136
- Top = 95
- Width = 52
- Height = 17
- Caption = 'Levels'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 0
- end
- object exValueBar: TTrackBar
- Left = 76
- Top = 66
- Width = 150
- Height = 22
- Max = 50
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = exValueBarChange
- end
- object exValueEdit: TEdit
- Left = 228
- Top = 64
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 2
- Text = '1'
- OnChange = exValueEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet13: TTabSheet
- Caption = 'Gamma'
- object Label12: TLabel
- Left = 34
- Top = 75
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object GammaBar: TTrackBar
- Left = 80
- Top = 74
- Width = 150
- Height = 22
- Max = 50
- Min = 10
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = GammaBarChange
- end
- object GammaEdit: TEdit
- Left = 232
- Top = 72
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '10'
- OnChange = GammaEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet12: TTabSheet
- Caption = 'Gray Area'
- object Label6: TLabel
- Left = 0
- Top = 176
- Width = 195
- Height = 13
- Caption = 'Select an area and click apply or preview'
- end
- end
- object TabSheet14: TTabSheet
- Caption = 'HalfTone'
- object Label41: TLabel
- Left = 26
- Top = 43
- Width = 27
- Height = 13
- Caption = 'Angle'
- end
- object Label40: TLabel
- Left = 12
- Top = 68
- Width = 41
- Height = 13
- Caption = 'Cell_size'
- end
- object htAngleBar: TTrackBar
- Left = 88
- Top = 39
- Width = 150
- Height = 22
- Max = 1800
- Orientation = trHorizontal
- Frequency = 1
- Position = 450
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = htAngleBarChange
- end
- object htCellSizeBar: TTrackBar
- Left = 88
- Top = 69
- Width = 150
- Height = 22
- Max = 100
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 4
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = htCellSizeBarChange
- end
- object htAngleEdit: TEdit
- Left = 248
- Top = 38
- Width = 41
- Height = 21
- MaxLength = 8
- TabOrder = 1
- Text = '45.00'
- OnChange = htAngleEditChange
- OnKeyPress = RealEditKeyPress
- end
- object htCellSizeEdit: TEdit
- Left = 248
- Top = 68
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '4'
- OnChange = htCellSizeEditChange
- OnKeyPress = EditKeyPress
- end
- object GroupBox33: TGroupBox
- Left = 65
- Top = 104
- Width = 209
- Height = 50
- Hint = 'Shape to use for halftoning'
- Caption = 'Shape'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- object Rcircle: TRadioButton
- Left = 72
- Top = 13
- Width = 58
- Height = 17
- Caption = 'Circle'
- TabOrder = 0
- end
- object Rellipse: TRadioButton
- Left = 72
- Top = 28
- Width = 58
- Height = 16
- Caption = 'Ellipse'
- TabOrder = 1
- end
- object Rsqaure: TRadioButton
- Left = 139
- Top = 12
- Width = 58
- Height = 17
- Caption = 'Sqaure'
- TabOrder = 2
- end
- object Rdiamond: TRadioButton
- Left = 8
- Top = 13
- Width = 66
- Height = 17
- Caption = 'Diamond'
- TabOrder = 3
- end
- object Rline: TRadioButton
- Left = 8
- Top = 28
- Width = 66
- Height = 16
- Caption = 'Line'
- TabOrder = 4
- end
- object Rcross: TRadioButton
- Left = 140
- Top = 28
- Width = 66
- Height = 17
- Caption = 'Cross'
- Checked = True
- TabOrder = 5
- TabStop = True
- end
- end
- end
- object TabSheet15: TTabSheet
- Caption = 'Hue and Saturation'
- object Label70: TLabel
- Left = 42
- Top = 20
- Width = 20
- Height = 13
- Caption = 'Hue'
- end
- object Label72: TLabel
- Left = 14
- Top = 49
- Width = 48
- Height = 13
- Caption = 'Saturation'
- end
- object Label73: TLabel
- Left = 35
- Top = 78
- Width = 27
- Height = 13
- Caption = 'Bright'
- end
- object hsHueBar: TTrackBar
- Left = 88
- Top = 20
- Width = 150
- Height = 22
- Max = 360
- Orientation = trHorizontal
- Frequency = 1
- Position = 180
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = hsHueBarChange
- end
- object hsSatBar: TTrackBar
- Left = 88
- Top = 50
- Width = 150
- Height = 22
- Max = 200
- Orientation = trHorizontal
- Frequency = 1
- Position = 100
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = hsSatBarChange
- end
- object hsHueEdit: TEdit
- Left = 248
- Top = 19
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 2
- Text = '180'
- OnChange = hsHueEditChange
- OnKeyPress = EditKeyPress
- end
- object hsSatEdit: TEdit
- Left = 248
- Top = 49
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '100'
- OnChange = hsSatEditChange
- OnKeyPress = EditKeyPress
- end
- object hsBrightBar: TTrackBar
- Left = 88
- Top = 78
- Width = 150
- Height = 22
- Max = 200
- Orientation = trHorizontal
- Frequency = 1
- Position = 100
- SelEnd = 0
- SelStart = 0
- TabOrder = 4
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = hsBrightBarChange
- end
- object hsBrightEdit: TEdit
- Left = 248
- Top = 77
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 5
- Text = '100'
- OnChange = hsBrightEditChange
- OnKeyPress = EditKeyPress
- end
- object a3col: TRadioButton
- Left = 77
- Top = 115
- Width = 64
- Height = 17
- Caption = 'All Colors'
- Checked = True
- TabOrder = 6
- TabStop = True
- OnClick = hsChannels
- end
- object rRed: TRadioButton
- Left = 157
- Top = 116
- Width = 47
- Height = 17
- Caption = 'Red'
- TabOrder = 7
- OnClick = hsChannels
- end
- object rGreen: TRadioButton
- Left = 157
- Top = 138
- Width = 54
- Height = 17
- Caption = 'Green'
- TabOrder = 8
- OnClick = hsChannels
- end
- object rBlue: TRadioButton
- Left = 157
- Top = 160
- Width = 47
- Height = 17
- Caption = 'Blue'
- TabOrder = 9
- OnClick = hsChannels
- end
- object rYEL: TRadioButton
- Left = 216
- Top = 115
- Width = 54
- Height = 17
- Caption = 'Yellow'
- TabOrder = 10
- OnClick = hsChannels
- end
- object rMag: TRadioButton
- Left = 216
- Top = 137
- Width = 66
- Height = 17
- Caption = 'Magenta'
- TabOrder = 11
- OnClick = hsChannels
- end
- object rCyn: TRadioButton
- Left = 216
- Top = 159
- Width = 47
- Height = 17
- Caption = 'Cyan'
- TabOrder = 12
- OnClick = hsChannels
- end
- end
- object TabSheet17: TTabSheet
- Caption = 'Invert'
- object Label52: TLabel
- Left = 0
- Top = 176
- Width = 103
- Height = 13
- Caption = 'Click apply or preview'
- end
- end
- object TabSheet19: TTabSheet
- Caption = 'Jiggle'
- object Label35: TLabel
- Left = 14
- Top = 45
- Width = 30
- Height = 13
- Caption = 'Period'
- end
- object Label36: TLabel
- Left = 23
- Top = 70
- Width = 21
- Height = 13
- Caption = 'Amp'
- end
- object Label39: TLabel
- Left = 13
- Top = 97
- Width = 31
- Height = 13
- Caption = 'Shape'
- end
- object jgPeriodBar: TTrackBar
- Left = 88
- Top = 44
- Width = 150
- Height = 22
- Max = 100
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = jgPeriodBarChange
- end
- object jgAmpBar: TTrackBar
- Left = 88
- Top = 73
- Width = 150
- Height = 22
- Max = 360
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = jgAmpBarChange
- end
- object jgPeriodEdit: TEdit
- Left = 248
- Top = 43
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '1'
- OnChange = jgPeriodEditChange
- OnKeyPress = EditKeyPress
- end
- object jgAmpEdit: TEdit
- Left = 248
- Top = 73
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '10'
- OnChange = jgAmpEditChange
- OnKeyPress = EditKeyPress
- end
- object jgSine: TRadioButton
- Left = 92
- Top = 98
- Width = 63
- Height = 17
- Caption = 'Sine'
- Checked = True
- TabOrder = 4
- TabStop = True
- end
- object jgTriangle: TRadioButton
- Left = 158
- Top = 98
- Width = 63
- Height = 17
- Caption = 'Triangle'
- TabOrder = 5
- end
- end
- object TabSheet20: TTabSheet
- Caption = 'Mirror'
- object VBox: TCheckBox
- Left = 122
- Top = 65
- Width = 97
- Height = 17
- Caption = 'Vertical'
- TabOrder = 0
- end
- object HBox: TCheckBox
- Left = 122
- Top = 87
- Width = 97
- Height = 17
- Caption = 'Horizontal'
- TabOrder = 1
- end
- end
- object TabSheet21: TTabSheet
- Caption = 'Mosaic'
- object Label31: TLabel
- Left = 21
- Top = 10
- Width = 20
- Height = 13
- Caption = 'Size'
- end
- object labell: TLabel
- Left = 10
- Top = 89
- Width = 31
- Height = 13
- Caption = 'Height'
- end
- object labels: TLabel
- Left = 10
- Top = 35
- Width = 31
- Height = 13
- Caption = 'Space'
- end
- object Labels45: TLabel
- Left = 18
- Top = 63
- Width = 23
- Height = 13
- Caption = 'Light'
- end
- object Label1: TLabel
- Left = 1
- Top = 116
- Width = 40
- Height = 13
- Caption = 'Random'
- end
- object msSizeBar: TTrackBar
- Left = 44
- Top = 7
- Width = 150
- Height = 22
- Max = 1000
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 150
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = msSizeBarChange
- end
- object msSpaceBar: TTrackBar
- Left = 44
- Top = 35
- Width = 150
- Height = 22
- Max = 100
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 3
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = msSpaceBarChange
- end
- object msLightBar: TTrackBar
- Left = 44
- Top = 62
- Width = 150
- Height = 22
- Max = 360
- Min = -360
- Orientation = trHorizontal
- Frequency = 1
- Position = 40
- SelEnd = 0
- SelStart = 0
- TabOrder = 5
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = msLightBarChange
- end
- object msSizeEdit: TEdit
- Left = 204
- Top = 5
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '150'
- OnChange = msSizeEditChange
- OnKeyPress = EditKeyPress
- end
- object msSpaceEdit: TEdit
- Left = 204
- Top = 32
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 4
- Text = '10'
- OnChange = msSpaceEditChange
- OnKeyPress = EditKeyPress
- end
- object msLightEdit: TEdit
- Left = 204
- Top = 59
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 6
- Text = '40'
- OnChange = msLightEditChange
- OnKeyPress = EditKeyPress
- end
- object msHeightBar: TTrackBar
- Left = 44
- Top = 89
- Width = 150
- Height = 22
- Max = 1000
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 30
- SelEnd = 0
- SelStart = 0
- TabOrder = 8
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = msHeightBarChange
- end
- object msHeightEdit: TEdit
- Left = 204
- Top = 86
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 9
- Text = '30'
- OnChange = msHeightEditChange
- OnKeyPress = EditKeyPress
- end
- object PolyBox: TGroupBox
- Left = 254
- Top = 2
- Width = 77
- Height = 31
- Caption = 'Polygons'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- object btnType2: TRadioButton
- Left = 49
- Top = 12
- Width = 17
- Height = 17
- Checked = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- TabStop = True
- OnClick = msPolygons
- end
- object btnType: TRadioButton
- Left = 12
- Top = 12
- Width = 18
- Height = 17
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = msPolygons
- end
- end
- object SmoothBox: TGroupBox
- Left = 253
- Top = 104
- Width = 77
- Height = 31
- Caption = 'Smooth'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 12
- object MosSur2: TRadioButton
- Left = 49
- Top = 12
- Width = 17
- Height = 17
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = msSmooth
- end
- object MosSur1: TRadioButton
- Left = 12
- Top = 12
- Width = 18
- Height = 17
- Checked = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- TabStop = True
- OnClick = msSmooth
- end
- end
- object msRandomBar: TTrackBar
- Left = 44
- Top = 116
- Width = 150
- Height = 22
- Max = 5
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 10
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = msRandomBarChange
- end
- object msRandomEdit: TEdit
- Left = 204
- Top = 113
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 11
- Text = '1'
- OnChange = msRandomEditChange
- OnKeyPress = EditKeyPress
- end
- object MosBColor: TBitBtn
- Left = 13
- Top = 149
- Width = 119
- Height = 30
- Caption = 'Background Color'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 13
- OnClick = BackColorClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
- DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
- 0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
- 000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
- Style = bsNew
- end
- object MosFColor: TBitBtn
- Left = 197
- Top = 150
- Width = 119
- Height = 30
- Caption = 'Foreground Color'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 14
- OnClick = ForeColorBtnClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
- DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
- 0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
- 000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
- Style = bsNew
- end
- object MosAntiA: TCheckBox
- Left = 255
- Top = 57
- Width = 82
- Height = 17
- Hint = 'Anti-Aliasing'
- Caption = 'Anti-Aliasing'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 7
- end
- object Panel7: TPanel
- Left = 131
- Top = 149
- Width = 18
- Height = 30
- TabOrder = 15
- end
- object Panel8: TPanel
- Left = 315
- Top = 150
- Width = 18
- Height = 30
- TabOrder = 16
- end
- end
- object TabSheet22: TTabSheet
- Caption = 'Motion Blur'
- object Label24: TLabel
- Left = 45
- Top = 71
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object Label25: TLabel
- Left = 45
- Top = 41
- Width = 27
- Height = 13
- Caption = 'Angle'
- end
- object MotionZoom: TRadioButton
- Left = 88
- Top = 103
- Width = 113
- Height = 17
- Caption = 'Motion Zoom'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- TabStop = True
- OnClick = MotionBlurSet
- end
- object MotionRotate: TRadioButton
- Left = 88
- Top = 122
- Width = 113
- Height = 17
- Caption = 'Motion Rotate'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = MotionBlurSet
- end
- object MotionLine: TRadioButton
- Left = 88
- Top = 143
- Width = 113
- Height = 17
- Caption = 'Motion Line'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = MotionBlurSet
- end
- object mtAnglebar: TTrackBar
- Left = 88
- Top = 39
- Width = 150
- Height = 22
- Max = 360
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = mtAnglebarChange
- end
- object mtValueBar: TTrackBar
- Left = 88
- Top = 69
- Width = 150
- Height = 22
- Max = 500
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = mtValueBarChange
- end
- object mtAngleEdit: TEdit
- Left = 248
- Top = 38
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '10'
- OnChange = mtAngleEditChange
- OnKeyPress = EditKeyPress
- end
- object mtValueEdit: TEdit
- Left = 248
- Top = 68
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '10'
- OnChange = mtValueEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet23: TTabSheet
- Caption = 'Noisify'
- object Label13: TLabel
- Left = 45
- Top = 23
- Width = 20
- Height = 13
- Caption = 'Red'
- end
- object Label14: TLabel
- Left = 36
- Top = 47
- Width = 29
- Height = 13
- Caption = 'Green'
- end
- object Label33: TLabel
- Left = 44
- Top = 82
- Width = 21
- Height = 13
- Caption = 'Blue'
- end
- object Label15: TLabel
- Left = 43
- Top = 118
- Width = 22
- Height = 13
- Caption = 'Gray'
- end
- object Label16: TLabel
- Left = 29
- Top = 157
- Width = 36
- Height = 13
- Hint = 'gauss or uniform'
- Caption = 'Method'
- end
- object nsRedBar: TTrackBar
- Left = 88
- Top = 20
- Width = 150
- Height = 22
- Max = 255
- Orientation = trHorizontal
- Frequency = 1
- Position = 20
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = nsRedBarChange
- end
- object nsGreenBar: TTrackBar
- Left = 88
- Top = 50
- Width = 150
- Height = 22
- Max = 255
- Orientation = trHorizontal
- Frequency = 1
- Position = 20
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = nsGreenBarChange
- end
- object nsBlueBar: TTrackBar
- Left = 88
- Top = 81
- Width = 150
- Height = 22
- Max = 255
- Orientation = trHorizontal
- Frequency = 1
- Position = 20
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = nsBlueBarChange
- end
- object nsRedEdit: TEdit
- Left = 248
- Top = 19
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '20'
- OnChange = nsRedEditChange
- OnKeyPress = EditKeyPress
- end
- object nsGreenEdit: TEdit
- Left = 248
- Top = 49
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 4
- Text = '20'
- OnChange = nsGreenEditChange
- OnKeyPress = EditKeyPress
- end
- object nsBlueEdit: TEdit
- Left = 248
- Top = 80
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 5
- Text = '20'
- OnChange = nsBlueEditChange
- OnKeyPress = EditKeyPress
- end
- object Panel3: TPanel
- Left = 95
- Top = 150
- Width = 200
- Height = 30
- TabOrder = 6
- object nsGaus: TRadioButton
- Left = 8
- Top = 8
- Width = 65
- Height = 17
- Caption = 'Gauss'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object RadioButton2: TRadioButton
- Left = 128
- Top = 8
- Width = 65
- Height = 17
- Caption = 'Uniform'
- TabOrder = 1
- end
- end
- object Panel4: TPanel
- Left = 95
- Top = 111
- Width = 200
- Height = 30
- TabOrder = 7
- object UseGrayValueofPixels: TCheckBox
- Left = 16
- Top = 7
- Width = 177
- Height = 17
- Caption = 'Use Gray Value of Pixels'
- TabOrder = 0
- end
- end
- end
- object TabSheet25: TTabSheet
- Caption = 'Oil Paint'
- object Label11: TLabel
- Left = 34
- Top = 75
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object opValueBar: TTrackBar
- Left = 72
- Top = 74
- Width = 150
- Height = 22
- Max = 50
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = opValueBarChange
- end
- object opValueEdit: TEdit
- Left = 224
- Top = 72
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '1'
- OnChange = opValueEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet8: TTabSheet
- Caption = 'Page Curl'
- object C_Trans: TCheckBox
- Left = 164
- Top = 58
- Width = 157
- Height = 17
- Hint = 'Keep Image'
- Caption = 'Keep Image under the curl'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object GroupBox24: TGroupBox
- Left = 2
- Top = 71
- Width = 148
- Height = 115
- Caption = 'Shading'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- object Label4: TLabel
- Left = 6
- Top = 75
- Width = 103
- Height = 13
- Caption = 'Shading transparancy'
- end
- object B_CUBC: TRadioButton
- Left = 6
- Top = 32
- Width = 125
- Height = 17
- Hint = 'Use Background color'
- Caption = 'Use Background color'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object B_CUFC: TRadioButton
- Left = 5
- Top = 14
- Width = 127
- Height = 17
- Hint = 'Use Foreground color'
- Caption = 'Use Foreground color'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- TabStop = True
- end
- object pcShadingBar: TTrackBar
- Left = 3
- Top = 90
- Width = 88
- Height = 22
- Max = 4
- Orientation = trHorizontal
- Frequency = 1
- Position = 4
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = pcShadingBarChange
- end
- object pcShadingEdit: TEdit
- Left = 97
- Top = 89
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '4'
- OnChange = pcShadingEditChange
- OnKeyPress = EditKeyPress
- end
- object CShade: TCheckBox
- Left = 8
- Top = 54
- Width = 125
- Height = 16
- Hint = 'Shade Under Curl'
- Caption = 'Shade Under Curl'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 4
- end
- end
- object FCC: TGroupBox
- Left = 158
- Top = 2
- Width = 177
- Height = 50
- Caption = 'Background'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- object B_CFC: TRadioButton
- Left = 7
- Top = 28
- Width = 125
- Height = 17
- Hint = 'Use Background color'
- Caption = 'Use Background color'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- TabStop = True
- end
- object B_CBC: TRadioButton
- Left = 7
- Top = 12
- Width = 125
- Height = 17
- Hint = 'Use Foreground color'
- Caption = 'Use Foreground color'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- end
- object GroupBox23: TGroupBox
- Left = 158
- Top = 80
- Width = 177
- Height = 43
- Caption = 'Orientation'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- object C_OH: TRadioButton
- Left = 11
- Top = 17
- Width = 72
- Height = 17
- Hint = 'Horizonal Curl'
- Caption = 'Horizonal'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- TabStop = True
- end
- object C_OV: TRadioButton
- Left = 87
- Top = 17
- Width = 77
- Height = 17
- Hint = 'Vertical Curl'
- Caption = 'Vertical'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- end
- object GroupBox22: TGroupBox
- Left = 158
- Top = 123
- Width = 177
- Height = 64
- Caption = 'Location '
- TabOrder = 4
- object C_RT: TRadioButton
- Left = 99
- Top = 16
- Width = 72
- Height = 17
- Hint = 'Right Top'
- Alignment = taLeftJustify
- Caption = 'Top Right'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object C_LT: TRadioButton
- Left = 5
- Top = 16
- Width = 68
- Height = 17
- Hint = 'Left Top'
- Caption = 'Top Left'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- TabStop = True
- end
- object C_LB: TRadioButton
- Left = 4
- Top = 44
- Width = 77
- Height = 17
- Hint = 'Left Bottom'
- Caption = 'Bottom Left'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object C_RB: TRadioButton
- Left = 92
- Top = 43
- Width = 79
- Height = 17
- Hint = 'Right Bottom'
- Alignment = taLeftJustify
- Caption = 'Bottom Right'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- end
- object BitBtn1: TBitBtn
- Left = 22
- Top = 10
- Width = 119
- Height = 24
- Caption = 'Background Color'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = BackColorClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
- DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
- 0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
- 000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
- Style = bsNew
- end
- object ForeColorBtn: TBitBtn
- Left = 22
- Top = 33
- Width = 119
- Height = 23
- Caption = 'Foreground Color'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = ForeColorBtnClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
- DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
- 0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
- 000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
- Style = bsNew
- end
- object Panel11: TPanel
- Left = 4
- Top = 10
- Width = 18
- Height = 23
- TabOrder = 7
- end
- object Panel12: TPanel
- Left = 4
- Top = 33
- Width = 18
- Height = 23
- TabOrder = 8
- end
- end
- object TabSheet26: TTabSheet
- Caption = 'Paste Image'
- object PasteFromClipBtn: TSpeedButton
- Left = 175
- Top = 12
- Width = 144
- Height = 25
- Hint = 'Paste an Image from the clipboard on top of the master image'
- Caption = 'Paste Image from clipboard'
- Enabled = False
- OnClick = PasteFromClipBtnClick
- end
- object Label63: TLabel
- Left = 185
- Top = 55
- Width = 113
- Height = 65
- Alignment = taCenter
- AutoSize = False
- Caption =
- 'Load an image from file, twain or clipboard. Drag the image to t' +
- 'he desired position and apply.'
- WordWrap = True
- end
- object ScanImage: TSpeedButton
- Left = 175
- Top = 130
- Width = 144
- Height = 25
- Hint = 'Scan an Image'
- Caption = 'Aquire Image'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333300003333333333333333333300003333033333333333333300003333
- 3000333333333333000033333333033333333333000033333333303333333333
- 0000333333338088333333330000333333300000833333330000333333077777
- 08333333000033333307FFFF08333333000033333307FFFF0833333300003333
- 3307FFFF0888333300003330007FFFFFF00083330000330777FFFFFFFFFF0833
- 00003307FAAAAAAAAAFF083300003307FFFFFFFFFFFF08330000333000000000
- 0000833300003333333333333333333300003333333333333333333300003333
- 33333333333333330000}
- ParentShowHint = False
- ShowHint = True
- OnClick = ScanImageClick
- end
- object ScanSelect: TSpeedButton
- Left = 175
- Top = 154
- Width = 144
- Height = 25
- Hint = 'Scanner Select'
- Caption = 'Select Twain Source'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333334
- 444444440000333333333334333B33340000333303333334333B333400003333
- 30003334BBBBBBB40000333333330334333B3334000033333333303444444444
- 0000333333338088333333330000333333300000833333330000333333077777
- 0833333300003333330799990833333300003333330799990833333300003333
- 3307999908883333000033300079999990008333000033077799999999990833
- 000033079AAAAAAAAA9908330000330799999999999908330000333000000000
- 0000833300003333333333333333333300003333333333333333333300003333
- 33333333333333330000}
- ParentShowHint = False
- ShowHint = True
- OnClick = ScanSelectClick
- end
- object FileListBox1: TFileListBox
- Left = 1
- Top = 2
- Width = 145
- Height = 80
- Color = clBtnFace
- ItemHeight = 13
- Mask = '*.BMP;*.GIF;*.JPG;*.PCX;*.PNG;*.TIF;*.PCD;*.TGA'
- TabOrder = 0
- OnChange = FileListBox1Change
- end
- object DirectoryListBox1: TDirectoryListBox
- Left = 2
- Top = 83
- Width = 145
- Height = 85
- Color = clBtnFace
- ItemHeight = 16
- TabOrder = 1
- OnChange = DirectoryListBox1Change
- end
- object DriveComboBox1: TDriveComboBox
- Left = 3
- Top = 170
- Width = 145
- Height = 19
- Color = clBtnFace
- TabOrder = 2
- OnChange = DriveComboBox1Change
- end
- object Panel16: TPanel
- Left = 152
- Top = 168
- Width = 21
- Height = 17
- BevelOuter = bvNone
- TabOrder = 3
- Visible = False
- end
- end
- object TabSheet27: TTabSheet
- Caption = 'Pinch Hole'
- object Label10: TLabel
- Left = 34
- Top = 75
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object phValueBar: TTrackBar
- Left = 72
- Top = 74
- Width = 150
- Height = 22
- Max = 0
- Min = -20
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = phValueBarChange
- end
- object phValueEdit: TEdit
- Left = 224
- Top = 72
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = phValueEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet30: TTabSheet
- Caption = 'Polar'
- object Label28: TLabel
- Left = 29
- Top = 28
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object Label29: TLabel
- Left = 29
- Top = 78
- Width = 27
- Height = 13
- Caption = 'Angle'
- end
- object PolInv: TCheckBox
- Left = 80
- Top = 104
- Width = 57
- Height = 17
- Caption = 'Inverse'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object PolBack: TCheckBox
- Left = 79
- Top = 133
- Width = 71
- Height = 17
- Caption = 'Backwards'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- object plValueBar: TTrackBar
- Left = 72
- Top = 26
- Width = 150
- Height = 22
- Max = 500
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = plValueBarChange
- end
- object plValueEdit: TEdit
- Left = 224
- Top = 24
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '0'
- OnChange = plValueEditChange
- OnKeyPress = EditKeyPress
- end
- object plAngleBar: TTrackBar
- Left = 73
- Top = 74
- Width = 150
- Height = 22
- Max = 360
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 4
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = plAngleBarChange
- end
- object plAngleEdit: TEdit
- Left = 225
- Top = 72
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 5
- Text = '0'
- OnChange = plAngleEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet32: TTabSheet
- Caption = 'Rotate'
- object Label9: TLabel
- Left = 34
- Top = 75
- Width = 27
- Height = 13
- Caption = 'Angle'
- end
- object rtValueBar: TTrackBar
- Left = 72
- Top = 74
- Width = 150
- Height = 22
- Max = 1800
- Min = -1800
- Orientation = trHorizontal
- Frequency = 10
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = rtValueBarChange
- end
- object rtValueEdit: TEdit
- Left = 224
- Top = 72
- Width = 53
- Height = 21
- MaxLength = 8
- TabOrder = 1
- Text = '0.00'
- OnChange = rtValueEditChange
- OnKeyPress = RealEditKeyPress
- end
- object BackColor: TBitBtn
- Left = 98
- Top = 115
- Width = 128
- Height = 30
- Caption = 'Background Color'
- TabOrder = 2
- OnClick = BackColorClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
- DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
- 0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
- 000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
- Style = bsNew
- end
- object Panel13: TPanel
- Left = 80
- Top = 115
- Width = 18
- Height = 30
- TabOrder = 3
- end
- end
- object TabSheet34: TTabSheet
- Caption = 'Sharp'
- object Label8: TLabel
- Left = 34
- Top = 75
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object shValueBar: TTrackBar
- Left = 72
- Top = 74
- Width = 150
- Height = 22
- Max = 9
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = shValueBarChange
- end
- object shValueEdit: TEdit
- Left = 224
- Top = 72
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = shValueEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet16: TTabSheet
- Caption = 'Soft'
- object Label7: TLabel
- Left = 34
- Top = 75
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object soValueBar: TTrackBar
- Left = 72
- Top = 74
- Width = 150
- Height = 22
- Max = 9
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = soValueBarChange
- end
- object soValueEdit: TEdit
- Left = 224
- Top = 72
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = soValueEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet36: TTabSheet
- Caption = 'Spray'
- object Label38: TLabel
- Left = 23
- Top = 80
- Width = 40
- Height = 13
- Caption = 'Random'
- end
- object Label37: TLabel
- Left = 34
- Top = 52
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object sprValueBar: TTrackBar
- Left = 81
- Top = 51
- Width = 150
- Height = 22
- Max = 100
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = sprValueBarChange
- end
- object sprValueEdit: TEdit
- Left = 233
- Top = 49
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = sprValueEditChange
- OnKeyPress = EditKeyPress
- end
- object sprRandomBar: TTrackBar
- Left = 81
- Top = 79
- Width = 150
- Height = 22
- Max = 360
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = sprRandomBarChange
- end
- object sprRandomEdit: TEdit
- Left = 233
- Top = 77
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 3
- Text = '1'
- OnChange = sprRandomEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet37: TTabSheet
- Caption = 'Tile Maker'
- object Label42: TLabel
- Left = 0
- Top = 176
- Width = 103
- Height = 13
- Caption = 'Click apply or preview'
- end
- end
- object TabSheet39: TTabSheet
- Caption = 'Threshold'
- object Label45: TLabel
- Left = 34
- Top = 75
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object ThresAnti: TCheckBox
- Left = 108
- Top = 111
- Width = 109
- Height = 17
- Caption = 'Anti Alialsing'
- Checked = True
- State = cbChecked
- TabOrder = 0
- end
- object thValueBar: TTrackBar
- Left = 72
- Top = 74
- Width = 150
- Height = 22
- Max = 255
- Orientation = trHorizontal
- Frequency = 1
- Position = 120
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = thValueBarChange
- end
- object thValueEdit: TEdit
- Left = 224
- Top = 72
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 2
- Text = '120'
- OnChange = thValueEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet40: TTabSheet
- Caption = 'Transitions'
- object Label46: TLabel
- Left = 44
- Top = 46
- Width = 27
- Height = 13
- Caption = 'Delay'
- end
- object Label47: TLabel
- Left = 23
- Top = 71
- Width = 49
- Height = 13
- Caption = 'Thickness'
- end
- object FXN: TRadioButton
- Left = 83
- Top = 104
- Width = 85
- Height = 17
- Caption = 'None'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = FXMethod
- end
- object FXH: TRadioButton
- Left = 83
- Top = 124
- Width = 85
- Height = 17
- Caption = 'Horizontal'
- TabOrder = 1
- OnClick = FXMethod
- end
- object FXV: TRadioButton
- Left = 83
- Top = 144
- Width = 85
- Height = 17
- Caption = 'Vertical'
- TabOrder = 2
- OnClick = FXMethod
- end
- object FXD: TRadioButton
- Left = 179
- Top = 103
- Width = 85
- Height = 17
- Caption = 'Diagonal'
- TabOrder = 3
- OnClick = FXMethod
- end
- object FXS: TRadioButton
- Left = 179
- Top = 123
- Width = 85
- Height = 17
- Caption = 'Squares'
- TabOrder = 4
- OnClick = FXMethod
- end
- object FXR: TRadioButton
- Left = 179
- Top = 143
- Width = 85
- Height = 17
- Caption = 'Rectangle'
- TabOrder = 5
- OnClick = FXMethod
- end
- object trDelayBar: TTrackBar
- Left = 81
- Top = 42
- Width = 150
- Height = 22
- Max = 100
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 15
- SelEnd = 0
- SelStart = 0
- TabOrder = 6
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = trDelayBarChange
- end
- object trThickbar: TTrackBar
- Left = 81
- Top = 70
- Width = 150
- Height = 22
- Max = 20
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 4
- SelEnd = 0
- SelStart = 0
- TabOrder = 7
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = trThickbarChange
- end
- object trDelayEdit: TEdit
- Left = 233
- Top = 40
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 8
- Text = '15'
- OnChange = trDelayEditChange
- OnKeyPress = EditKeyPress
- end
- object trThickEdit: TEdit
- Left = 233
- Top = 68
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 9
- Text = '4'
- OnChange = trThickEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet24: TTabSheet
- Caption = 'Warp'
- object Label55: TLabel
- Left = 86
- Top = 16
- Width = 45
- Height = 13
- Caption = 'ScaleFac'
- end
- object Label56: TLabel
- Left = 65
- Top = 40
- Width = 66
- Height = 13
- Caption = 'Vector Rotate'
- end
- object Label57: TLabel
- Left = 104
- Top = 70
- Width = 27
- Height = 13
- Caption = 'Steps'
- end
- object Label58: TLabel
- Left = 3
- Top = 99
- Width = 130
- Height = 13
- Caption = 'Displacement scaling factor'
- end
- object RgbToHueBox: TCheckBox
- Left = 63
- Top = 122
- Width = 97
- Height = 17
- Alignment = taLeftJustify
- Caption = 'RGB To Hue'
- Checked = True
- State = cbChecked
- TabOrder = 0
- end
- object RGBToSaturationBox: TCheckBox
- Left = 35
- Top = 143
- Width = 125
- Height = 17
- Alignment = taLeftJustify
- Caption = 'RGB To Saturation'
- Checked = True
- State = cbChecked
- TabOrder = 1
- end
- object ConvoleTgle: TCheckBox
- Left = 44
- Top = 165
- Width = 116
- Height = 17
- Alignment = taLeftJustify
- Caption = 'Convole Toggles '
- Checked = True
- State = cbChecked
- TabOrder = 2
- end
- object wrpScaleBar: TTrackBar
- Left = 139
- Top = 13
- Width = 150
- Height = 22
- Max = 200
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 20
- SelEnd = 0
- SelStart = 0
- TabOrder = 3
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = wrpScaleBarChange
- end
- object wrpScaleEdit: TEdit
- Left = 292
- Top = 11
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 4
- Text = '20'
- OnChange = wrpScaleEditChange
- OnKeyPress = EditKeyPress
- end
- object wrpVecRotateBar: TTrackBar
- Left = 139
- Top = 39
- Width = 150
- Height = 22
- Max = 360
- Orientation = trHorizontal
- Frequency = 1
- Position = 90
- SelEnd = 0
- SelStart = 0
- TabOrder = 5
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = wrpVecRotateBarChange
- end
- object wrpVecRotateEdit: TEdit
- Left = 292
- Top = 37
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 6
- Text = '90'
- OnChange = wrpVecRotateEditChange
- OnKeyPress = EditKeyPress
- end
- object wrpStepsBar: TTrackBar
- Left = 139
- Top = 69
- Width = 150
- Height = 22
- Max = 200
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 4
- SelEnd = 0
- SelStart = 0
- TabOrder = 7
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = wrpStepsBarChange
- end
- object wrpStepsEdit: TEdit
- Left = 292
- Top = 67
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 8
- Text = '4'
- OnChange = wrpStepsEditChange
- OnKeyPress = EditKeyPress
- end
- object wrpDisplacementBar: TTrackBar
- Left = 139
- Top = 97
- Width = 150
- Height = 22
- Max = 200
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 9
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = wrpDisplacementBarChange
- end
- object wrpDisplacementEdit: TEdit
- Left = 292
- Top = 95
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 10
- Text = '10'
- OnChange = wrpDisplacementEditChange
- OnKeyPress = EditKeyPress
- end
- end
- object TabSheet42: TTabSheet
- Caption = 'Wave'
- object Label111: TLabel
- Left = 48
- Top = 67
- Width = 30
- Height = 13
- Caption = 'Phase'
- end
- object Label49: TLabel
- Left = 17
- Top = 38
- Width = 61
- Height = 13
- Caption = 'Wave length'
- end
- object Label50: TLabel
- Left = 32
- Top = 96
- Width = 46
- Height = 13
- Caption = 'Amplitude'
- end
- object Refl: TCheckBox
- Left = 36
- Top = 134
- Width = 157
- Height = 17
- Hint = 'Reflective waves or just distorting'
- Caption = 'Add Reflection to Waves'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object Smear: TCheckBox
- Left = 204
- Top = 133
- Width = 101
- Height = 17
- Hint = 'Smear the edges out'
- Caption = 'Smear Waves'
- Checked = True
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 1
- end
- object wvLengthBar: TTrackBar
- Left = 81
- Top = 36
- Width = 150
- Height = 22
- Max = 200
- Orientation = trHorizontal
- Frequency = 1
- Position = 20
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = wvLengthBarChange
- end
- object wvPhaseBar: TTrackBar
- Left = 81
- Top = 64
- Width = 150
- Height = 22
- Max = 3600
- Min = 1
- Orientation = trHorizontal
- Frequency = 1
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 3
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = wvPhaseBarChange
- end
- object wvLengthEdit: TEdit
- Left = 233
- Top = 34
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 4
- Text = '20'
- OnChange = wvLengthEditChange
- OnKeyPress = EditKeyPress
- end
- object wvPhaseEdit: TEdit
- Left = 233
- Top = 62
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 5
- Text = '0'
- OnChange = wvPhaseEditChange
- OnKeyPress = RealEditKeyPress
- end
- object wvAmplBar: TTrackBar
- Left = 81
- Top = 94
- Width = 150
- Height = 22
- Max = 2000
- Orientation = trHorizontal
- Frequency = 1
- Position = 50
- SelEnd = 0
- SelStart = 0
- TabOrder = 6
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = wvAmplBarChange
- end
- object wvAmplEdit: TEdit
- Left = 233
- Top = 92
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 7
- Text = '50'
- OnChange = wvAmplEditChange
- OnKeyPress = RealEditKeyPress
- end
- end
- object TabSheet41: TTabSheet
- Caption = 'WhirlPool'
- object Label48: TLabel
- Left = 34
- Top = 75
- Width = 27
- Height = 13
- Caption = 'Value'
- end
- object wpValueBar: TTrackBar
- Left = 72
- Top = 74
- Width = 150
- Height = 22
- Max = 3000
- Orientation = trHorizontal
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = wpValueBarChange
- end
- object wpValueEdit: TEdit
- Left = 224
- Top = 72
- Width = 41
- Height = 21
- MaxLength = 4
- TabOrder = 1
- Text = '0'
- OnChange = wpValueEditChange
- OnKeyPress = EditKeyPress
- end
- end
- end
- object ilProgress: TProgressBar
- Left = 413
- Top = 264
- Width = 175
- Height = 15
- Hint = 'Current status of the image handling'
- Min = 0
- Max = 100
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- object Panel5: TPanel
- Left = 1
- Top = 28
- Width = 247
- Height = 232
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 4
- object Panel6: TPanel
- Left = 0
- Top = 211
- Width = 247
- Height = 21
- Align = alBottom
- BevelOuter = bvLowered
- TabOrder = 0
- object Label59: TLabel
- Left = 3
- Top = 5
- Width = 8
- Height = 12
- Caption = 'L:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -9
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label60: TLabel
- Left = 60
- Top = 5
- Width = 8
- Height = 12
- Caption = 'T:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -9
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label61: TLabel
- Left = 118
- Top = 5
- Width = 10
- Height = 12
- Caption = 'R:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -9
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label62: TLabel
- Left = 175
- Top = 5
- Width = 9
- Height = 12
- Caption = 'B:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -9
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object RLeftEdit: TEdit
- Left = 14
- Top = 4
- Width = 43
- Height = 13
- TabStop = False
- AutoSelect = False
- AutoSize = False
- BorderStyle = bsNone
- Color = clBtnFace
- Ctl3D = False
- ParentCtl3D = False
- ReadOnly = True
- TabOrder = 0
- Text = '0'
- OnKeyPress = EditKeyPress
- end
- object RTopEdit: TEdit
- Left = 71
- Top = 4
- Width = 43
- Height = 13
- TabStop = False
- AutoSelect = False
- AutoSize = False
- BorderStyle = bsNone
- Color = clBtnFace
- Ctl3D = False
- ParentCtl3D = False
- ReadOnly = True
- TabOrder = 1
- Text = '0'
- OnKeyPress = EditKeyPress
- end
- object RRightEdit: TEdit
- Left = 129
- Top = 4
- Width = 43
- Height = 13
- TabStop = False
- AutoSelect = False
- AutoSize = False
- BorderStyle = bsNone
- Color = clBtnFace
- Ctl3D = False
- ParentCtl3D = False
- ReadOnly = True
- TabOrder = 2
- Text = '100'
- OnKeyPress = EditKeyPress
- end
- object RBottomEdit: TEdit
- Left = 186
- Top = 4
- Width = 43
- Height = 13
- TabStop = False
- AutoSelect = False
- AutoSize = False
- BorderStyle = bsNone
- Color = clBtnFace
- Ctl3D = False
- ParentCtl3D = False
- ReadOnly = True
- TabOrder = 3
- Text = '100'
- OnKeyPress = EditKeyPress
- end
- end
- end
- end
- object MainMenu1: TMainMenu
- Left = 16
- Top = 40
- object File1: TMenuItem
- Caption = '&File'
- object Apply1: TMenuItem
- Caption = 'Apply'
- Hint = 'Apply this effect to the master image'
- OnClick = DoEffect
- end
- object Preview1: TMenuItem
- Caption = 'Preview'
- Hint = 'Apply this effect to the preview image'
- OnClick = DoEffect
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Resetalltodefault1: TMenuItem
- Caption = 'Reset to default'
- Hint = 'Reload all default settings'
- OnClick = Resetalltodefault1Click
- end
- object Savesettingsonexit1: TMenuItem
- Caption = 'Save settings on exit'
- Checked = True
- GroupIndex = 1
- Hint = 'Save settings on exit'
- OnClick = Savesettingsonexit1Click
- end
- object N2: TMenuItem
- Caption = '-'
- GroupIndex = 1
- end
- object Exit1: TMenuItem
- Caption = 'Exit'
- GroupIndex = 1
- Hint = 'Close this window'
- OnClick = exBtnClick
- end
- object N3: TMenuItem
- Caption = '-'
- GroupIndex = 1
- end
- end
- object DistortionFilters1: TMenuItem
- Caption = '&Image'
- object Mirror1: TMenuItem
- Caption = 'Mirror'
- Hint = 'Mirror the image'
- OnClick = MenuItemToTab
- end
- object PasteImage1: TMenuItem
- Caption = 'Paste Image'
- OnClick = MenuItemToTab
- end
- object Invert1: TMenuItem
- Caption = 'Invert'
- Hint = 'Invert the image'
- OnClick = MenuItemToTab
- end
- object Rotate1: TMenuItem
- Caption = 'Rotate'
- Hint = 'Rotate the image by degree'
- OnClick = MenuItemToTab
- end
- object Borders1: TMenuItem
- Caption = 'Borders'
- Hint = 'Place borders arround the image'
- OnClick = MenuItemToTab
- end
- object Fade1: TMenuItem
- Caption = 'Border Fade'
- Hint = 'Fade the image towards the border'
- OnClick = MenuItemToTab
- end
- object EdgeDetection1: TMenuItem
- Caption = 'Edge Detection'
- Hint = 'Find the edges in an image'
- OnClick = MenuItemToTab
- end
- object GrayArea1: TMenuItem
- Caption = 'Gray Area'
- Hint = 'Select an area and convert this to grayscale'
- OnClick = MenuItemToTab
- end
- object MakeTile1: TMenuItem
- Caption = 'Tile Maker'
- Hint = 'Generate an image suitable for tiling'
- OnClick = MenuItemToTab
- end
- object N4: TMenuItem
- Caption = '-'
- end
- end
- object Deformation1: TMenuItem
- Caption = '&Deformation'
- object Bleed1: TMenuItem
- Caption = 'Bleed'
- Hint = 'Bleed colors of the image'
- OnClick = MenuItemToTab
- end
- object Blur1: TMenuItem
- Caption = 'Blur'
- Hint = 'Fuzy the image'
- OnClick = MenuItemToTab
- end
- object Engrave1: TMenuItem
- Caption = 'Engrave'
- Hint = 'Engrave the image'
- OnClick = MenuItemToTab
- end
- object Extrude1: TMenuItem
- Caption = 'Extrude'
- Hint = 'Extrude the image with pyramids'
- OnClick = MenuItemToTab
- end
- object Jiggle1: TMenuItem
- Caption = 'Jiggle'
- Hint = 'Jiggle the image'
- OnClick = MenuItemToTab
- end
- object MotionBlur1: TMenuItem
- Caption = 'Motion Blur'
- Hint = 'Apply a motion effect to the image'
- OnClick = MenuItemToTab
- end
- object Mosaic1: TMenuItem
- Caption = 'Mosaic'
- Hint = 'Generate a mosiac effect'
- OnClick = MenuItemToTab
- end
- object Noisy1: TMenuItem
- Caption = 'Noisify'
- Hint = 'Place random pixels onto the image'
- OnClick = MenuItemToTab
- end
- object OilPaint1: TMenuItem
- Caption = 'Oil Paint'
- Hint = 'Generate an oil painting effect'
- OnClick = MenuItemToTab
- end
- object PinchHole1: TMenuItem
- Caption = 'Pinch Hole'
- Hint = 'Pinch a hole into the image'
- OnClick = MenuItemToTab
- end
- object Polar1: TMenuItem
- Caption = 'Polar'
- Hint = 'Apply a polar / fisheye effect'
- OnClick = MenuItemToTab
- end
- object PageCurl1: TMenuItem
- Caption = 'Page Curl'
- Hint = 'Generate a page curl on the image'
- OnClick = MenuItemToTab
- end
- object Spray1: TMenuItem
- Caption = 'Spray'
- Hint = 'Spay random colors onto the image'
- OnClick = MenuItemToTab
- end
- object WhirlPool1: TMenuItem
- Caption = 'WhirlPool'
- Hint = 'Whirl the image'
- OnClick = MenuItemToTab
- end
- object Wave1: TMenuItem
- Caption = 'Wave'
- Hint = 'Apply a wave onto the image'
- OnClick = MenuItemToTab
- end
- object Warp1: TMenuItem
- Caption = 'Warp'
- OnClick = MenuItemToTab
- end
- object N5: TMenuItem
- Caption = '-'
- end
- end
- object Correction1: TMenuItem
- Caption = '&Correction'
- object AutoContrast1: TMenuItem
- Caption = 'AutoContrast'
- Hint = 'Find the contrast automatically'
- OnClick = MenuItemToTab
- end
- object Bright1: TMenuItem
- Caption = 'Bright'
- Hint = 'Brighten the image'
- OnClick = MenuItemToTab
- end
- object ColorPalette1: TMenuItem
- Caption = 'Color Palette'
- OnClick = MenuItemToTab
- end
- object Color1: TMenuItem
- Caption = 'Color'
- Hint = 'Decrease the colors of the image'
- OnClick = MenuItemToTab
- end
- object Dark1: TMenuItem
- Caption = 'Dark'
- Hint = 'Darken the image'
- OnClick = MenuItemToTab
- end
- object Despeckle1: TMenuItem
- Caption = 'Despeckle'
- Hint = 'Correct the pixels of the image'
- OnClick = MenuItemToTab
- end
- object Enhance1: TMenuItem
- Caption = 'Enhance'
- Hint = 'Contrast, bright, and gamma correct the image'
- OnClick = MenuItemToTab
- end
- object Gamma1: TMenuItem
- Caption = 'Gamma'
- Hint = 'gamma correct the image'
- OnClick = MenuItemToTab
- end
- object HalfTone1: TMenuItem
- Caption = 'HalfTone'
- Hint = 'Apply a Halftone onto the image'
- OnClick = MenuItemToTab
- end
- object HueSaturation1: TMenuItem
- Caption = 'Hue and Saturation'
- Hint = 'Coorect the Hue/Saturation and Value to the image'
- OnClick = MenuItemToTab
- end
- object Sharp1: TMenuItem
- Caption = 'Sharp'
- Hint = 'Sharpen the image'
- OnClick = MenuItemToTab
- end
- object Soft1: TMenuItem
- Caption = 'Soft'
- Hint = 'Soften the image'
- OnClick = MenuItemToTab
- end
- object Threshold1: TMenuItem
- Caption = 'Threshold'
- Hint = 'Apply a threshold value onto the image'
- OnClick = MenuItemToTab
- end
- object N6: TMenuItem
- Caption = '-'
- end
- end
- object Transitions1: TMenuItem
- Caption = '&Transitions'
- OnClick = Transitions1Click
- end
- end
- object ColorDialog: TColorDialog
- Ctl3D = True
- CustomColors.Strings = (
- 'ColorA=141414'
- 'ColorB=3C3C3C'
- 'ColorC=646464'
- 'ColorD=8C8C8C'
- 'ColorE=FFB4B4B4'
- 'ColorF=FFDCDCDC'
- 'ColorG=FFF0F0F0'
- 'ColorH=FFF0F0F0'
- 'ColorI=282828'
- 'ColorJ=505050'
- 'ColorK=787878'
- 'ColorL=FFA0A0A0'
- 'ColorM=FFC8C8C8'
- 'ColorN=FFF0F0F0'
- 'ColorO=FFF0F0F0'
- 'ColorP=FFF0F0F0')
- Options = [cdFullOpen, cdAnyColor]
- Left = 48
- Top = 39
- end
- object PasteTimer: TTimer
- Interval = 3000
- OnTimer = PasteTimerTimer
- Left = 81
- Top = 39
- end
- object PalOpen: TOpenDialog
- DefaultExt = 'IPL'
- Filter = 'ImageLib 3.0 Palette|*.ILP'
- Options = [ofExtensionDifferent, ofPathMustExist, ofFileMustExist]
- Left = 17
- Top = 76
- end
- object PalSave: TSaveDialog
- DefaultExt = 'IPL'
- Filter = 'ImageLib 3.0 Palette|*.ILP'
- Options = [ofPathMustExist, ofCreatePrompt]
- Left = 49
- Top = 76
- end
- end
-